

OUTPUT TO c:\pc.txt .


FOR EACH pt_ NO-LOCK WHERE pt_part BEGINS "P",
    EACH CODE_ NO-LOCK WHERE CODE_fldname = "pt_drwg_loc" AND CODE_value = pt_drwg_loc WITH STREAM-IO :
    DISP pt_part pt_drwg_loc CODE_cmmt .
END.

